object MsgHunter: TMsgHunter Left = 241 Top = 166 HelpContext = 14060 BorderIcons = [biSystemMenu] BorderStyle = bsDialog Caption = 'Re-filter Mail Folder' ClientHeight = 279 ClientWidth = 293 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = True Position = poScreenCenter OnClose = FormClose OnCloseQuery = FormCloseQuery OnCreate = FormCreate OnDestroy = FormDestroy OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Book: TNotebook Left = 0 Top = 0 Width = 293 Height = 233 Align = alTop TabOrder = 0 object TPage Left = 0 Top = 0 Caption = 'Default' object gbSets: TGroupBox Left = 8 Top = 16 Width = 277 Height = 129 Caption = 'Rule sets to apply' TabOrder = 0 object cbReceived: TCheckBox Left = 16 Top = 24 Width = 253 Height = 17 Caption = '&Incoming mail' TabOrder = 0 end object cbRead: TCheckBox Left = 16 Top = 48 Width = 249 Height = 17 Caption = '&Read messages' TabOrder = 1 end object cbReply: TCheckBox Left = 16 Top = 72 Width = 249 Height = 17 Caption = 'R&eplied messages' TabOrder = 2 end object cbOutgoing: TCheckBox Left = 16 Top = 96 Width = 249 Height = 17 Caption = '&Outgoing mail' TabOrder = 3 end end object cbManual: TCheckBox Left = 24 Top = 160 Width = 261 Height = 17 Caption = '&Manual filters only' TabOrder = 1 end object cbSelected: TCheckBox Left = 24 Top = 208 Width = 257 Height = 17 Caption = 'Re-filter &selected messages only' TabOrder = 3 Visible = False end object cbLog: TCheckBox Left = 24 Top = 184 Width = 257 Height = 17 Caption = 'Log filtering results' Checked = True State = cbChecked TabOrder = 2 end end object TPage Left = 0 Top = 0 Caption = 'Progress' object Label1: TLabel Left = 16 Top = 24 Width = 44 Height = 13 Caption = 'Progress:' end object lbMsgs: TLabel Left = 16 Top = 88 Width = 103 Height = 13 Caption = 'Messages processed:' end object lProcessed: TLabel Left = 168 Top = 88 Width = 89 Height = 13 AutoSize = False Caption = '0' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object ltFiltered: TLabel Left = 16 Top = 112 Width = 85 Height = 13 Caption = 'Messages filtered:' end object lFiltered: TLabel Left = 168 Top = 112 Width = 89 Height = 13 AutoSize = False Caption = '0' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object lRefComplete: TLabel Left = 16 Top = 168 Width = 96 Height = 13 Caption = 'Re-filtering complete' Visible = False end object pBar: TProgressBar Left = 16 Top = 40 Width = 241 Height = 25 TabOrder = 0 end end end object bOK: TButton Left = 18 Top = 248 Width = 81 Height = 25 Caption = 'OK' Default = True TabOrder = 1 OnClick = bOKClick end object bCancel: TButton Left = 106 Top = 248 Width = 81 Height = 25 Cancel = True Caption = 'Cancel' TabOrder = 2 OnClick = bCancelClick end object bHelp: TButton Left = 194 Top = 248 Width = 81 Height = 25 Caption = 'Help' TabOrder = 3 OnClick = bHelpClick end end